home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / qbbs / zlab_ra3.zip / ZLAB-XFD.BAT < prev   
DOS Batch File  |  1992-02-08  |  2KB  |  47 lines

  1. @echo off
  2. rem             ZipLab Plus - FileDoor Interface batch
  3. rem                  by Mike Ehlert 1:102/1001
  4. rem                         Version 2.0
  5. rem
  6. rem  Read the ZLAB-RA.DOC that came with this batch for more info. 
  7. rem 
  8. rem  This will assume the enviornment variable %NODE% is set to the current
  9. rem  node number. For example "Set NODE=1" for line1, and so on.
  10. rem  If you don't run multinode, then you can replace "%NODE%" with "1" 
  11. rem 
  12. rem 
  13. rem First convert the RA DORINFO1.DEF to  PCBOARD.DAT and PCBOARD.SYS files
  14. rem and tack on lines 153-198 to make it an extended PCBOARD.DAT file.
  15.  
  16. qkdoor c:\ra\line%NODE%\RA c:\ra\line%NODE%\PCB14
  17. copy c:\ra\line%NODE%\pcboard.dat+c:\ra\ziplab\add.%NODE% c:\ra\line%NODE%\pcboard.dat
  18.  
  19. Rem Be sure the PCBDOOR variable is set as PRODOOR so ZipLab plus is happy.
  20.  
  21. Set PCBDOOR=PRODOOR
  22.  
  23. rem  Check which archive types are there, and for each type of archive type
  24. rem  found, loop running ZipLab-Plus (ptest.exe) once for each filename.
  25. rem  Looping is done with the for/in statement, which calls the ZipLab-Plus
  26. rem  program (ptest.exe) once for each matching filename, passing the dir
  27. rem  and filename with it.
  28. rem  This is done for all the ZIP, ARJ and LZH files found in the temp upload
  29. rem  directory. If there any GIF files a for/in loop runs GIFTEST.EXE on them.
  30.  
  31. if not exist %1\*.* goto done
  32. if exist %1\*.GIF for %%1 in (*.gif) c:\system\giftest.exe /E /I 
  33. if exist %1\*.ZIP for %%1 in (*.zip) c:\ra\ziplab\ptest.exe %1\%%1 c:\ra\ziplab\ptest%NODE%.cfg
  34. if exist %1\*.ARJ for %%1 in (*.arj) c:\ra\ziplab\ptest.exe %1\%%1 c:\ra\ziplab\ptest%NODE%.cfg
  35. if exist %1\*.LZH for %%1 in (*.lzh) c:\ra\ziplab\ptest.exe %1\%%1 c:\ra\ziplab\ptest%NODE%.cfg
  36.  
  37. rem Remove temporary flag file, FileDoor does not care for a result anyhow.
  38.  
  39. if exist pcbfail.txt erase pcbfail.txt
  40.  
  41.  
  42. Rem May as well free up the enviornment by a few bytes...
  43.  
  44. Set PCBDOOR=
  45.  
  46. Rem Thats it, now its back to FileDoor.
  47.